10 REM ** PREPARED BY DAVID BRADLEY **
90 PRINT"[147]"
100 POKE53280,0:POKE53281,0:PRINT"";
110 READNM:DIMTT$(NM),TL$(NM),RN$(NM)
120 FORI=1TONM:READTT$(I),TL$(I),RN$(I):NEXTI
125 PRINT"[147]":PRINTTAB(10):PRINT"[129]****[158][205][197][206][213]/[204][207][193][196][197][210][146]***[129]*[158]":PRINT
135 PRINT"[197][206][212][197][210][160][217][207][213][210][160][195][200][207][201][195][197][160][193][206][196][160][208][210][197][211][211][160][210][197][212][213][210][206][146]"
137 PRINT:PRINT
140 FORI=1TONM
150 PRINTTAB(12)RIGHT$("0"+MID$(STR$(I),2),2)") "TT$(I)
155 NEXTI
162 REM *RIATE LINE 163 THROUGH 169.  *         *******************************
164 PRINT"[156][212][208][213][199] [205][193][217] [195]64 [196][201][211][203] ([205][197][206][213] #2)[146][158]"
170 INPUT"[217][207][213][210][160][195][200][207][201][195][197]";A$
171 IFA$="Q"THENPRINT"[147]":END
172 IFA$="L"THENPRINT"[147]":LIST
180 A=VAL(A$):IF(A<1ORA>NM)ANDA$<>CHR$(80)THENPRINT"[145]";:GOTO170
185 IFA$=CHR$(80)THENGOSUB250:PRINT"";:GOTO170
190 PRINT"[147][142]LOAD"CHR$(34)TL$(A)CHR$(34)",8,1"
200 PRINT""RN$(A)
210 POKE198,3:POKE631,19:POKE632,13:POKE633,13
220 END
250 RESTORE:READNM
252 FORI=1TONM:READTT$(I),TL$(I),RN$(I):NEXTI
270 OPEN4,4:PRINT#4,CHR$(10)CHR$(10)CHR$(10);"  ":CD$=CHR$(17)
272 FORI=1TONM:PRINT#4,CD$;CHR$(16);"15";TT$(I):NEXTI
274 PRINT#4,"   "CHR$(10)CHR$(10):CLOSE4:RETURN
900 REM
910 REM
920 REM
990 REM PROGRAM DATA
1000 DATA 15
1010 DATA"[210]ELATIVE [198]ILE [205]ANAGER",REL FILE BOOT.C,RUN
1020 DATA"[211]PRITE [196][193][212][193]",SPRITE DATA.C,RUN
1030 DATA"[211]UPER [205]ASTERMIND",SUPER MIND.C,RUN
1040 DATA"[204]ABLE [205]AKER",LABEL MAKER.C,RUN
1050 DATA"[195]OPY-[193][204][204] [214]ERSION 2",COPY-ALL V2.C,RUN
1060 DATA"[194]IG [195]HARACTER [211]ET",BIG SET.C,RUN
1070 DATA"[211]INE [201]N",SINE IN.C,RUN
1080 DATA"[212]INY [196]IRECTORY",TINY DIRECTORY.C,RUN
1090 DATA"[196]ISK [205]AP",DISK MAP.C,RUN
1100 DATA"[196]ISK [205]AP [204]IST-[205]E",LIST-ME MAP.L,LIST
1110 DATA"[196]IRECTORY [204]IST [211]ORT",DIR LIST SORT.C,RUN
1120 DATA"[195]HOPPER",CHOPPER.C,RUN
1130 DATA"[211]TOCK [205]ARKET",STOCK.C,RUN
1140 DATA"[195]LASS [205]ANAGEMENT",CLASS PROGRAM.C,RUN
1150 DATA"[197][214][197][206] [205][207][210][197] [205][197][206][213]",EVEN MORE MENU,RUN